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IDENTIFICATION 
PROGRAM- ID. 



DIVISION. 
PRG1. 



ENVIRONMENT DIVISION. 
INPUT-OUTPUT SECTION. 
FILE-CONTROL. 

SELECT IFILE01 



ASSIGN SYS IN 



DATA DIVISION. 

FILE SECTION. 
FD IFILE01. 
01 1REC01. 

03 IDATA11 PIC X(20). 

03 IDATA12 PIC X(20). 

03 IDATA13 PIC X(20). 

03 IDATA14 PIC X(20). 
WORKING-STORAGE SECTION. 
01 WREC01. 

03 WDATA11 PIC 9(02). 

03 WDATA12 PIC 9(02). 

03 WDATA13 PIC 9(02). 

03 WDATA14 PIC 9(02). 
01 WREC02. 

03 WDATA21 PIC X(40). 

03 WDATA22 PIC X(40). 

77 WDATA71 PIC 9(02). 

77 WDATA72 PIC 9(02). 



*>UNUSED 
*>UNUSED 
*>UNUSED 
*>UNUSED 
*>UNUSED 



*>UNUSED 
*>UNUSED 

*>UNUSED 
*>UNUSED 
*>UNUSED 
*>UNUSED 



PROCEDURE DIVISION. 

MOVE 1 TO WDATA11 OF WREC01. 
MOVE 2 TO WDATA14 OF WREC01. 

COMPUTE WDATA72 = WDATA11 OF WREC01 + WDATA14 OF WREC01. 
DISPLAY WDATA72. 
STOP RUN. 



F I G. 1 (RE LAT ED ART) 



TITLE: STORAGE MEDIUM STORING 
PROGRAM DIRECTING COMPUTER TO 
CONTROL OPTIMIZATION... 
INVENTORS: Masanori KIRA 
SERIAL NO.: Unassigned 
DOCKET NO.: 826.1897 



IDENTIFICATION 
PROGRAM- ID. 



000010 
000020 
000030 

000040 ENVIRONMENT 
000050 INPUT-OUTPUT 
000060 FILE-CONTROL. 



DIVISION. 
PRGl. 

DIVISION. 
SECTION. 



FILE 



000070 
000080 . 
000090 
000100 DATA 
000110 
000120 FD 
000130 01 
000140 
000150 
000160 
000170 



SELECT IFILE01 ASSIGN SYS IN 



03 
03 
03 
03 



FILE01. 

IREC01. 
IDATA11 
IDATA12 
IDATA13 
IDATA14 



DIVISION. 
SECTION. 



PIC X(20). 

PIC X(20). 

PIC X(20). 

PIC X(20). 
SECTION. 

PIC 9(02). 

PIC 9(02). 

PIC 9(02). 

PIC 9(02). 



000180 WORKING-STORAGE 
000190 01 WRECOl. 
000200 03 WDATA11 
000210 03 WDATA12 
000220 03 WDATA13 
000230 03 WDATA14 
000240* DELETED 
000250* DELETED 
000260* DELETED 
000270* DELETED 

000280 77 WDATA72 PIC 9(02). 
000290 

000300 PROCEDURE 
MOVE 



*>UNUSED 
*>UNUSED 
*>UNUSED 
*>UNUSED 
*>UNUSED 



*>UNUSED 
*>UNUSED 



000310 
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DIVISION. 
1 TO WDATA11 OF WRECOl. 
MOVE 2 TO WDATA14 OF 
COMPUTE WDATA72 = WDATA11 
DISPLAY WDATA72. 
STOP RUN. 



WRECOl. 

OF WRECOl 



WDATA14 OF WRECOl. 
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# include <stdio. h> 

struct { 

char idatal1[20]; 

char idatal2[20] : 

char idata13[20] : 

char idatal4[20] : 
} irecOl; 

void ma in (void) { 
struct { 

short wdatal 1 ; 

short wdatal 2; 

short wdatal 3; 

short wdatal4; 
} wrecOl ; 

struct { 

char wdata21[40]; AUNUSED*/ 

char wdata22[40]: AUNUSED*/ 

} wrec02; AUNUSED*/ 

short wdata71 : AUNUSED*/ 
short wdata72; 

wrecOI. wdatal 1 = 1 ; 
wrecOl. wdatal 4 = 2: 

wdata72 = wrecOl. wdatal 1 + wrecOl. wdatal 4; 
printf r%d¥n". wdata72) ; 

} 



AUNUSED*/ 
AUNUSED*/ 
AUNUSED*/ 
AUNUSED*/ 
/*UNUSED*/ 



/*UNUSED*/ 
/*UNUSED*/ 
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# include <stdio. h> 

struct { 
char idatal1[20]: 
char idatal2[20]: 
char idata13[20] : 
char idata14[20] ; 

} irecOl; 

void main(void) { 
struct { 

short wdatall ; 

short wdata12: 

short wdata13; 

short wdata14; 
} wrecOl ; 



/*DELETED*/ 
ADELETED*/ 
ADELETED*/ 
ADELETED*/ 
/♦DELETED*/ 



/*UNUSED*/ 
/*UNUSED*/ 



/* DELETED */ 
/* DELETED */ 
/* DELETED */ 
/* DELETED */ 

/* DELETED */ 
short wdata72; 



wrecOI. wdatall = 1 ; 
wrecOI. wdatal4 = 2: 
wdata72 = wrecOI. wdatall 
printf r%d¥n". wdata72) : 



+ wrecOl. wdata14; 
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DATA ITEM HAVING 
HIERARCHICAL STRUCTURE 

EXISTING? 

1 




Yes 



STEP S4 





DETERMINING WHETHER 
OR NOT UNUSED DATA 
ITEMS ARE TO BE 
MERGED 






f ( ■ 




DIAGNOSTIC MESSAGE OUTPUT 
SPECIFICATION? 

I 

Yes 

^ 



STEP S5 




STEP S6 



OUTPUTTING DIAGNOSTIC MESSAGE 



STEP S7 




No 



No 



STEP S8 



MERGE SPECIFICATION? 



Yes 




MERGING UNUSED DATA ITEMS 



No 



3f 

END J 
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IDENTIFICATION 
PROGRAM- ID. 



DIVISION. 
PR61. 



ENVIRONMENT 
INPUT-OUTPUT 
FILE-CONTROL. 

SELECT IFILE01 



DIVISION. 
SECTION. 



ASSIGN SYS IN 



DATA 
FILE 

FD IFILE01. 

01 IREC01. 
03 IDATA11 
03 IDATA12 
03 IDATA13 
03 IDATA14 

WORKING-STORAGE 

01 WREC01. 
03 WDATA11 PIC 
03 WDATA12 PIC 
03 WDATA13 PIC 
03 WDATA14 PIC 

01 WREC02. 
03 WDATA21 PIC 
03 WDATA22 PIC 

77 WDATA71 PIC 

77 WDATA72 PIC 



DIVISION. 
SECTION. 



PIC X(20). 
PIC X(20). 
PIC X(20). 
PIC X(20). 
SECTION. 



9 (02) . 
9(02). 
9 (02) . 
9 (02) . 

X(40). 
X(40). 
9 (02) . 
9(02). 



*>UNUSED T CONTINUOUS AREA 
*>UNUSED I 
*>UNUSED I 
*>UNUSED I 
*>UNUSED i 



i'>UNUSED t CONTINUOUS AREA 
*>UNUSED i 

*>UNUSED T CONTINUOUS AREA 
*>UNUSED I 
*>UNUSED i 
*>UNUSED 



PROCEDURE DIVISION. 

MOVE 1 TO WDATA11 OF WREC01. 
MOVE 2 TO WDATA14 OF WREC01. 

COMPUTE WDATA72 = WDATA11 OF WREC01 + WDATA14 OF WREC01. 
DISPLAY WDATA72. 
STOP RUN. 
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WRECOl 
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POINTER TO ALL ITEMS (IN ASSIGNING ADDRESS) 



POINTER TO 
PARENT ITEM 



POINTER TO LEADING 
CHILD ITEM 



POINTER TO NEXT ITEM 
(IN ASSIGNING ADDRESS) 

POINTER TO OUTERMOST ITEM 
(HAVING NO PARENT) (*1) 
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I RECOIL IDATA11 IDATA12 IDATA13 IDATA14 — • 



WRECOl^ WDATA11 ^ WDATA12^ WDATAIS^ WDATA14 



WREC02 WDATA21 ^ WDATA22 — , 



^ WDATA71 — , 



WDATA72^ 0 
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RELATIVE DISPLACEMENT (byte) 
+ 0 



+ 5 
+ 6 



01 DATA11 


02 DATA21 


03 DATA31 PIC X(5) 






03 FILLER PIG X [IDLE BYTE] 






03 DATA32 PIC S9(4) BINARY 
SYNCHRONIZED 






03 DATA33 PIC S9(4) BINARY 
SYNCHRONIZED 




02 DATA22 



i 



RELATIVE DISPLACEMENT (bit) 



02 DATA22 


03 DATA34 PIC 1 (4) BIT SYNCHRONIZED 




03 FILLER PIC 1(4) BIT [IDLE BIT] 
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RELATIVE DISPLACEMENT 
+ 0 
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+08 



i recOl 


char idatall 
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[1] 
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char padi [PADDING] 




int idata12 
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POINTER TO DATA 
DICTIONARY 



ITEM 




PO INTER TO NEXT UNUSED DATA ITEM 



INFORMATION OTHER THAN POINTER IS DESCRIBED AS FOLLOWS. EXECUTION 
RESULT OF MERGE DETERMINATION ON DATA ITEM GROUP IS HELD. 

- STATUS: { UNDETERMINED | DETERMINED } 

- UNDETERMINED: MERGE DETERMINATION HAS NOT BEEN MADE ON DATA ITEM. 

- DETERMINED: MERGE DETERMINATION HAS BEEN MADE ON DATA ITEM. 

- RESULT: { MER6E-ENABLED | DELETION-ENABLED ) 

- MERGE-ENABLED: CAN BE MERGED WITH OTHER DATA ITEMS 

(CORRESPONDING TO ITEM A) 

- DELETION-ENABLED: CAN BE MERGED WITH OTHER DATA ITEMS 

(CORRESPONDING TO ITEM B) 

- LENGTH: SIGNIFICANT LENGTH OF MERGED ITEM A WHEN "STATUS" IS 

MERGED-ENABLED. 

- TYPE : SIGNIFICANT DATA TYPE OF MERGED ITEM A WHEN "STATUS" IS 

MERGE-ENABLED. 



F I G. 1 9 



TITLE: STORAGE MEDIUM STORING 
PROGRAM DIRECTING COMPUTER TO 
CONTROL OPTIMIZATION- 
INVENTORS: Masanori KIRA 
SERIAL NO.: Unassigned 
DOCKET NO.: 826.1897 



STEP SI 6 
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ITEM EXISTING? 
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SETTING RETRIEVED ITEM AS 
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RETURNING STATUS OF ITEM 

DEFINED AS ITEM B TO 
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RECURSIVE CALL USING 
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No 
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END OF 
TERMINATION 
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1 RECOl (UNDETERM 1 NED. -) . 1 DATAl 1 (UNDETERM 1 NED. -) . 
IDATAIZ (UNDETERMINED. -;. IDAIA13(UNUtlbKMINbD. -). 
1 DATAl 4 (UNDETERM 1 NED. -) . WDATAl 2 (UNDETERM 1 NED. -) . 
WDATAl 3 (UNDETERM 1 NED. -) . WREC02 (UNDETERM 1 NED. -) . 
WDATA21 (UNDETERMINED. -) . WDATA22 (UNDETERMINED. -) 
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1 RECOl (UNDETEM 1 NED. -) 1 DATAl 1 (UNDETERM 1 NED. -) . 

1 DATAl 2 (UNDETERM 1 NED. -) . 1 DATAl 3 (UNDETERM 1 NED. -) . 
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1 DATAl 4 (UNDETERM 1 NED. -) . WDATAl 2 (UNDETERM 1 NED. -) . 
WDATAl 3 (UNDETERM 1 NED. -) , WREC02 (UNDETERM 1 NED. -) , 
WDATA21 (UNDETERMINED, -) . WDATA22 (UNDETERMINED. -) 
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[RECU 


RSIVE CALL FROM SI 


9] 


o 


SOOd) 








1 DATA1 1 (UNDETERM 1 NED. -) . 1 DATA1 2 (UNDETERM 1 NED. -) . 
IDATA1 3 (UNDETERMINED -) IDATAMfUNDETERMINED -) 
WDATA1 2 (UNDETERM 1 NED. -) . WDATA1 3 (UNDETERM 1 NED. -) . 
WREC02 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED. -) . 
WDATA22 (UNDETERM 1 NED. -} 


Q 


Slid) 




0 




1 DATA1 1 (UNDETERM 1 NED, -) . 1 DATA1 2 (UNDETERM 1 NED. -) . 

inATAI'^dlNDFTFRMIMFn IDATAI^dlNnFTFRMIMFD 

WDATA1 2 (UNDETERM 1 NED. -) . WDATA1 3 (UNDETERM 1 NED. -) . 
WREC02 (UNDETERM 1 NED, -) , WDATA21 (UNDETERM 1 NED. -) , 
WDATA22 (UNDETERMINED.-) 


lU 


S12(1) 




0 


0 


1 DATA1 1 (UNDETERM 1 NED. -) . 1 DATA1 2 (UNDETERM 1 NED. -) . 

IDATAI'tniNnFTFRMINFn -S 1 DATAI A fllNDFTFRM 1 NFD 

WDATA1 2 (UNDETERM 1 NED. -) . WDATA1 3 (UNDETERM 1 NED. -) . 
WREC02 (UNDETERM 1 NED, -) . WDATA21 (UNDETERM 1 NED. -) . 
WDATA22 (UNDETERMINED. -) 


1 1 


S14(1) 


IDATA11 


0 


0 


1 DATA1 1 (DETERM 1 NED. -) , 1 DATAl 2 (UNDETERM 1 NED. -) , 

inATAII (IINnFTFRMINFD -S ir)ATA14niMnFTFRMINFn -\ 
1 un Into i ui\ni i ncu. j . i un i n i *t \uiwu i ciMn i iicu, j , 

WDATA1 2 (UNDETERM 1 NED. -) . WDATA1 3 (UNDETERM 1 NED, -) , 
WREC02 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED, -) . 
WDATA22 (UNDETERMINED. -) 


19 


S16(l) 


IDATA11 


IDATA11 


0 


1 DATAl 1 (DETERM 1 NED. -) . 1 DATAl 2 (UNDETERM 1 NED. -) . 
1 DATAl 3 (UNDETERMINED -) IDATA14 (UNDETERMINED -) 
WDATA1 2 (UNDETERM 1 NED. -) . WDATA1 3 (UNDETERM 1 NED, -) , 
WREC02 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED. -) . 
WDATA22 (UNDETERMINED. -) 


13 


S14(1) 


IDATA12 


IDATA11 


0 


1 DATAl 1 (DETERM 1 NED. -) . 1 DATAl 2 (DETERM 1 NED. -) , 
1 DATAl 3 (UNDETERM 1 NED, -) . 1 DATAl 4 (UNDETERM 1 NED. -) , 
WDATA1 2 (UNDETERM 1 NED. -) . WDATAl 3 (UNDETERM 1 NED, -) . 
WREC02 (UNDETERM 1 NED, -) , WDATA21 (UNDETERM 1 NED, -) . 
WDATA22 (UNDETERMINED.-) 


14 


S17(1) 


IDATA12 


IDATA11 


IDATA12 


1 DATAl 1 (DETERM 1 NED. -) . 1 DATAl 2 (DETERM 1 NED, -) , 
1 DATAl 3 (UNDETERM 1 NED. -) , 1 DATAl 4 (UNDETERM 1 NED. -) , 
WDATAl 2 (UNDETERM i NED. -) , WDATAl 3 (UNDETERM 1 NED. -) . 
WREC02 (UNDETERM 1 NED. -) , WDATA21 (UNDETERM 1 NED. -) , 
WDATA22 (UNDETERM 1 NED. -) 
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15 


S34(1) 


IDATA12 


IDATA11 


IDATA12 


IDATA11 (DETERMINED. MERGE-ENABLED) . 

IDATA1 2 (DETERMINED.-). 
1 DATA1 3 (UNDETERM 1 NED. -) . 1 DATA1 4 (UNDETERM 1 NED. -} . 
WDATA1 2 (UNDETERM 1 NED. -) . WDATA1 3 (UNDETERM 1 NED. -) . 
WREC02 (UNDETERM 1 NED. -) . WDATA2 1 (UNDETERM 1 NED. -) . 
WDATA22 (UNDETERM 1 NED. -) 


16 


S35(1) 


IDATA12 


IDATA11 


IDATA12 


IDATA11 (DETERMINED. MERGE-ENABLED). 

1 DATA1 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATA1 3 (UNDETERM 1 NED. -) . 1 DATAl 4 (UNDETERM 1 NED. -) . 
WDATA1 2 (UNDETERM 1 NED. -) . WDATA1 3 (UNDETERM 1 NED. -) . 
WREC02 (UNDETERM 1 NED. -) . WDATA2 1 (UNDETERM 1 NED, -) . 
WDATA22 (UNDETERM! NED.-) 


17 


S36(1) 


IDATA12 


IDATA11 


0 


1 DATAl 1 (DETERMINED. MERGE-ENABLED). 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATAl 3 (UNDETERM 1 NED. -) . 1 DATAl 4 (UNDETERM 1 NED. -) . 
WDATA1 2 (UNDETERM 1 NED. -) . WDATA1 3 (UNDETERM 1 NED. -) . 
WREC02 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED. -) . 
WDATA22 (UNDETERMINED.-) 


18 


S14(1) 


IDATA13 


IDATA11 


0 


IDATA11 (DETERMINED. MERE6ED-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATAl 3 (DETERM 1 NED, -) , 1 DATAl 4 (UNDETERM 1 NED, -) , 
WDATAl 2 (UNDETERM 1 NED. -) . WDATA1 3 (UNDETERM 1 NED. -) . 
WREC02 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED, -) . 
WDATA22 (UNDETERM 1 NED. -) 


19 


S17(1) 


IDATA13 


IDATA11 


IDATA13 


1 DATAl 1 (DETERMINED. MERGED-ENABLED) , 
1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) , 

1 DATAl 3 (DETERM 1 NED. -) , 1 DATAl 4 (UNDETERM 1 NED. -) , 

WDATAl 2 (UNDETERM 1 NED. -) . WDATAl 3 (UNDETERM 1 NED. -) . 

WREC02 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED. -) . 

WDATA22 (UNDETERMINED.-) 


20 


S35(1) 


IDATA13 


IDATA11 


IDATA13 


1 DATAl 1 (DETERM 1 NED. MERGED-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATAl 3 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
1 DATAl 4 (UNDETERM 1 NED. -) . WDATAl 2 (UNDETERM 1 NED. -) . 
WDATAl 3 (UNDETERM 1 NED. -) . WREC02 (UNDETERM 1 NED. -) . 
WDATA2 1 (UNDETERM 1 NED. -) . WDATA22 (UNDETERM 1 NED. -) 


21 


S36(1) 


IDATA13 


IDATA11 


0 


1 DATAl 1 (DETERMINED. MERGED-ENABLED) . 

I DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATAl 3 (DETERM 1 NED, DELET 1 ON-ENABLED) , 
1 DATAl 4 (UNDETERM 1 NED, -) , WDATAl 2 (UNDETERM 1 NED. -) . 
WDATAl 3 (UNDETERM 1 NED. -) . WREC02 (UNDETERM 1 NED. -) . 
WDATA21 (UNDETERM 1 NED. -) . WDATA22 (UNDETERM 1 NED. -) 



F I G. 2 6 



TITLE: STORAGE MEDIUM STORING 
PROGRAM DJRECTING COMPUTER TO 
CONTROL OPTIMIZATION- 
INVENTORS: Masanori KIRA 
SERIAL NO.: Unassigned 
DOCKET NO.: 826.1897 



22 


S14(1) 


IDATA14 


IDATA11 


0 


IDATA1 1 (DETERMINED, MERGE-ENABLED) . 

1 DATA1 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
1 DATA1 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATA1 4 (DETERM 1 NED. -) , WDATA1 2 (UNDETERM 1 NED. -) . 
WDATAl 3 (UNDETERMINED. -) , WRE(X)2 (UNDETERMINED, -) , 
WDATA21 (UNDETERMINED. -) . WDATA22 (UNDETERMINED. -) . 


23 


S17(1) 


IDATA14 


IDATAll 


IDATA14 


IDATA1 1 (DETERMINED. MERGE-ENABLED) . 

1 DATA1 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
IDATA1 4 (DETERM! NED.-), 

WDATAl 2 (UNDETERM 1 NED. -) . WDATAl 3 (UNDETERM 1 NED. -) . 
WRE002 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED. -) . 
WDATA22 (UNDETERMINED, -) , 


24 


S35(1) 


IDATA14 


IDATAll 


IDATA14 


1 DATAl 1 (DETERMINED. MERGE-ENABLED) , 
1 DATAl 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 4 (DETERM 1 NED, DELET i ON-ENABLED) , 

WDATAl 2 (UNDETERM 1 NED, -) , WDATAl 3 (UNDETERM 1 NED, -) . 

WRE002 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED. -) . 

WDATA22 (UNDETERMI NED. -) . 


25 


S36(1) 


IDATA14 


IDATAll 


0 


1 DATAl 1 (DETERM 1 NED, MEREGE-ENABLED) . 

1 DATAl 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
1 DATAl 3 (DETERM 1 NED, DELET 1 ON-ENABLED) , 
1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WDATAl 2 (UNDETERM 1 NED. -) . WDATAl 3 (UNDETERM 1 NED. -) . 
WREC02 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED. -) . 
WDATA22 (UNDETERMI NED,-), 


26 


S14(1) 


WDATA12 


IDATAll 


0 


1 DATAl 1 (DETERM 1 NED. MERGE-ENABLED) , 
1 DATAl 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 4 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

WDATAl 2 (UNDETERM 1 NED, -) . WDATAl 3 (UNDETERM 1 NED, -) , 

WREC02 (UNDETERMI NED. -) . WDATA21 (UNDETERMI NED. -) . 

WDATA22 (UNDETERMI NED. -) . 


27 


S17(1) 


WDATA12 


IDATAll 


WDATA12 


1 DATAl 1 (DETERM 1 NED. MERGE-ENABLED) . 

1 DATAl 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WDATAl 2 (DETERM 1 NED. -) . WDATAl 3 (UNDETERM 1 NED. -) . 
WRE(X)2 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED. -) . 
WDATA22 (UNDETERMI NED, -) , 




[RECOVE 


?Y FROM R 


ECURSIVE CALL] 


28 


SI 9(0) 


IDATAll 


IRECOl 


IDATAll 


IRECOl (DETERMINED.-). 

IDATAll (DETERMINED, MERGE-ENABLED), 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

IDATA13(DETERMINED. DELETION-ENABLED). 

1 DATAl 4 (DETERM 1 NED, DELET 1 ON-ENABLED) , 

WDATAl 2 (UNDETERMINED, -) . WDATAl 3 (UNDETERMINED. -) . 

WREC02 (UNDETERM 1 NED, -) . WDATA21 (UNDETERM 1 NED. -) . 

WDATA22 (UNDETERMI NED. -). 
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29 




IDATAI 1 


1 DCpAl 


I HATA 1 1 


IRFCOl fDFTFRMINFD MFRGF-FNABI FD^ 

1 DATA1 1 (DETERM 1 NED. MERGE-ENABLED) . 

1 DATA1 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATA1 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATA1 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

WDATAl 2 (UNDETERM 1 NED. -) . WDATAl 3 (UNDETERM 1 NED. -) . 

WREC02 (UNDETERM 1 NED, -) . WDATA21 (UNDETERM 1 NED. -) . 

WDATA22 (UNDETERM 1 NED. -) . 


30 




inATAI 1 




1 HATAI 1 
1 U A 1 A 1 1 


IRPnOI fDFTFRMINFD MFRfiF-FNARI FD^ 

1 DATAl 1 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) , 

WDATAl 2 (UNDETERM 1 NED, -) . WDATAl 3 (UNDETERM 1 NED. -) . 

WREC02 (UNDETERM 1 NED, -) , WDATA21 (UNDETERM 1 NED. -) . 

WDATA22 (UNDETERMINED.-). 


31 


OL*\ \\)) 


1 nATA1 1 
lUAIAI 1 


1 pppni 

1 itLUU 1 


rk 


IRFPOWDFTFRMIMPn MFRRF-FMARI FD^ 

1 DATAl 1 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 4 (DETERM 1 NED, DELET 1 ON-ENABLED) , 

WDATAl 2 (UNDETERM 1 NED. -) . WDATAl 3 (UNDETERM 1 NED. -) . 

WREC02 (UNDETERM 1 NED, -) , WDATA21 (UNDETERM 1 NED. -) . 

WDATA22 (UNDETERMINED.-). 


32 


o 14 U; 


WIHATAI 9 
VilUA 1 A 1 Z 


1 PCPOI 
1 KLOU I 


rk 
(p 


1 pppni /'nPTPRM 1 Mpn mprprp— pmari ph^ 

1 DATAl 1 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED, DELET 1 ON-ENABLED) , 

1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) , 

WDATAl 2 (DETERM 1 NED, -) , WDATAl 3 (UNDETERM 1 NED. -) . 

WREC02 (UNDETERM 1 NED, -) , WDATA21 (UNDETERM 1 NED. -) . 

WDATA22 (UNDETERMINED.-) 


33 


o 1 / \\)) 


WnATA19 
liun 1 A 1 il 


1 pppni 


WnATAI 9 
WUA 1 A 1 Z 


IRFftni fnFTFRMINFn MFRRF-FNARI FD') 

1 DATAl 1 (DETERMINED, DELETION-ENABLED). 

1 DATAl 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

1 DATA 1 3 (DETERM 1 NED, DELET 1 ON-ENABLED) , 

1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) , 

WDATAl 2 (DETERM 1 NED. -) . WDATAl 3 (UNDETERM 1 NED. -) . 

WRE002 (UNDETERM 1 NED. -) , WDATA21 (UNDETERMI NED, -) , 

WDATA22 (UNDETERMINED.-). 


34 


ooy \\)) 


UrnATAI 9 

muA \9\\c. 


WnATAl 9 
nUA 1 A 1 z 


WnATAI 9 
nUA 1 A 1 Z 


IRFnni rnFTFRMIMFft MFRRF-FU&RI FR^ 

1 DATAl 1 (DETERMINED, DELETION-ENABLED), 

1 DATAl 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERMINED, DELETION-ENABLED), 

1 DATAl 4 (DETERM 1 NED, DELET 1 ON-ENABLED) , 

WDATA12 (DETERMINED, -) , WDATAl 3 (UNDETERMINED. -) . 

WREC02 (UNDETERM 1 NED, -) , WDATA21 (UNDETERM 1 NED. -) . 

WDATA22 (UNDETERMI NED.-). 


35 


S40 (0) 


WDATAl 2 


WDATAl 2 




IRECOl (DETERMINED. MERGE-ENABLED). 

1 DATAl 1 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

i DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

1 DATAl 4 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

WDATAl 2 (DETERM 1 NED. -) , WDATAl 3 (UNDETERM 1 NED, -) , 

WREC02 (UNDETERMI NED, -) . WDATA21 (UNDETERMINED. -) . 

WDATA22 (UNDETERMI NED. -) . 
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36 


SI 4(0) 


WDATAl 3 


WDATAl 2 




IREC01 (DETERMINED, MERGE-ENABLED), 
1 DATA1 1 (DETERM 1 NED, DELET 1 ON-ENABLED) , 
1 DATA1 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATA1 3 (DETERM 1 NED. DELET 1 ON-ENABLED) , 
1 DATA1 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WDATAl 2 (DETERM 1 NED. -) . WDATAl 3 (DETERM 1 NED. -) , 
WREC02 (UNDETERMINED. -) . WDATA21 (UNDETERMINED. -) . 
WDATA22 (UNDETERMINED. -) 


37 


SI 7(0) 


III IN & T A •% rs 

WDATAl 3 


WDATAl 2 


lUK A Y A '4 n 

WDATAl 3 


IRECOl (DETERMINED. MERGE-ENABLED). 
1 DATA1 1 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATAl 2 (DETERMINED. DELET ION-ENABLED) . 
IDATA13 (DETERMINED. DELETION-ENABLED) . 
1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WDATAl 2 (DETERM 1 NED. -) , WDATAl 3 (DETERM 1 NED. -) . 
WREC02 (UNDETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED, -) , 
WDATA22 (UNDETERMINED. -) 


38 


S34 (0) 


WDATAl 3 


WDATAl 2 


WDATAl 3 


IRECOl (DETERMINED. MERGE-ENABLED) 

1 DATAl 1 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DAT Al 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

WDATAl 2 (DETERMINED. MERGE-ENABLED) . 

WDATAl 3 (DETERM 1 NED. -) . WREC02 (UNDETERM 1 NED. -) . 

WDATA21 (UNDETERMINED. -) . WDATA22 (UNDETERMINED. -) 


OA 

39 


S35(0) 


WDATAl 3 


WDATAl 2 


WDATAl 3 


IRECOl (DETERMINED. MEREGE-ENABLED). 

1 DATAl 1 (DETERMINED. DELETION-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 4 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

WDATAl 2 (DETERMINED. MERGE-ENABLED) . 

WDATAl 3 (DETERMINED. DELETION-ENABLED) . 

WREC02 (UNDETERMINED. -) . WDATA21 (UNDETERMINED. -) . 

WDATA22 (UNDETERMINED. -) 


40 


S36(0) 


WDATAl 3 


WDATAl 2 


0 


IRECOl (DETERMINED. MERGE-ENABLED). 

1 DATAl 1 (DETERM 1 NED, DELET 1 ON-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) , 

1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATA14 (DETERM 1 NED. DELET 1 ON-ENABLED) , 

WDATAl 2 (DETERMINED. MERGE-ENABLED) . 

WDATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

WREC02 (UNDETERM 1 NED, -) . WDATA21 (UNDETERM 1 NED. -) , 

WDATA22 (UNDETERMINED.-) 


A 1 

41 


S14(0) 


WREC02 


WDATAl 2 




IRECOl (DETERMINED, MERGE-ENABLED). 

1 DATAl 1 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) , 

1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) , 

WDATAl 2 (DETERM 1 NED. MERGE-ENABLED) . 

WDATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

WREC02 (DETERM 1 NED. -) . WDATA2 1 (UNDETERM 1 NED. -) , 

WDATA22 (UNDETERMINED. -) 


AO 


SI 7(0) 


WREC02 


WDATAl 2 


WREC02 


IRECOl (DETERMINED. MERGE-ENABLED). 

1 DA 1 A 1 1 (Db 1 bnM 1 NbD. UbLb 1 1 ON-bNAbLbD) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

WDATAl 2 (DETERM 1 NED. MERGE-ENABLED) . 

WDATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

WREC02(DETERMiNED, -) , WDATA21 (UNDETERMINED. -) . 

WDATA22 (UNDETERMINED.-) 
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43 


S39 (0) 


WREC02 


WREC02 


WREC02 


IREC01 (DETERMINED. MERGE-ENABLED). 

1 DATAl 1 (DETERMI NED. DELET 1 ON-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) , 

1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) , 

WDATAl 2 (DETERM 1 NED. MERGE-ENABLED) . 

WDATAl 3 (DETERMI NED. DELET 1 ON-ENABLED) . 

WREC02 (DETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED. -) . 

WDATA22 (UNDETERMINED.-) 


44 


S40(0) 


WREC02 


WREC02 


0 


IRECOl (DETERMINED. MERGE-ENABLED) . 

1 DATAl 1 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

WDATAl 2 (DETERM 1 NED. MERGE-ENABLED) . 

WDATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 

WREC02 (DETERM 1 NED. -) . WDATA21 (UNDETERM 1 NED. -) . 

WDATA22 (UNDETERMINED.-) 


45 


SI 4(0) 


WDATA21 


WREC02 


0 


IRECOl (DETERMINED. MERGE-ENABLED). 
1 DATAl 1 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WDATAl 2 (DETERM 1 NED. MERGE-ENABLED) . 
WDATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WREC02 (DETERM 1 NED. -) , WDATA21 (DETERM 1 NED. -) . 
WDATA22 (UNDETERM 1 NED. -) 


46 


SI 7(0) 


WDATA21 


WREC02 


WDATA21 


IRECOl (DETERMINED. MERGE-ENABLED). 
1 DATAl 1 (DETERMINED. DELETION-ENABLED). 
1 DATAl 2 (DETERM 1 NED. DELET 1 ON-ENABLED) , 
1 DATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATAl 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WDATAl 2 (DETERMINED, MERGE-ENABLED) , 
WDATAl 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WREC02 (DETERMINED. -). WDATA21 (DETERMINED. -) . 
WDATA22 (UNDETERM! NED.-) 




[RECURSIVE CALL FROM SI 




47 


SOOd) 








WDATA21 (UNDETERMINED,-), 
WDATA22 (UNDETERMINED,-), 


48 


Slid) 




<t> 




WDATA21 (UNDETERMINED.-). 
W0ATA22 (UNDETERMINED.-). 


49 


S12(l) 




0 


0 


WDATA21 (UNDETERMINED,-), 
WDATA22 (UNDETERM 1 NED. -) . 


50 


S14(1) 


WDATA21 


<t> 


0 


WDATA21 (DETERMINED.-). 
WDATA22 (UNDETERMINED,-). 


51 


S16(l) 


WDATA21 


WDATA21 


0 


WDATA21 (DETERMINED,-), 
WDATA22 (UNDETERMINED, -) , 


52 


S14(l) 


WDATA22 


WDATA21 


0 


WDATA21 (DETERMINED.-). 
WDATA22 (DETERMI NED.-). 


53 


S34(1) 


WDATA22 


WDATA21 


WDATA22 


WDATA21 (DETERMINED. MERGE-ENABLED). 
WDATA22 (DETERMI NED. -). 


54 


S35(l) 


WDATA22 


WDATA21 


WDATA22 


WDATA21 (DETERMINED. MERGE-ENABLED). 
WDATA22 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
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55 


S36(1) 


WDATA22 


WDATA21 


</> 


WDATA21 (DETERMINED. MERGE-ENABLED). 
WDATA22 (DETERM 1 NED. DELET 1 ON-ENABLED) . 




[RECOVERY FROM R 


ECURSIVE CALL) 


56 


SI 9(0) 


WDATA21 


WREC02 


WDATA21 


IREC01 (DETERMINED. MERGE-ENABLED). 
1 DATA1 1 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
1 DATA1 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
1 DATA1 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATA1 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WDATA1 2 (DETERM 1 NED. MERGE-ENABLED) . 
WDATAI 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WREC02 (DETERMINED.-), 
WDATA21 (DETERMINED, MERGE-ENABLED). 
WDATA22 (DETERM 1 NED, DELET ION-ENABLED) 


57 


S22(0) 


WDATA21 


WREC02 


WDATA21 


IREC01 (DETERMINED. MERGE-ENABLED). 
1 DATA1 1 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
1 DATA1 2 (DETERM 1 NED, DELET 1 ON-ENABLED) , 
1 DATA1 3 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
1 DATA1 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WDATAI 2 (DETERM 1 NED. MERGE-ENABLED) . 
WDATAI 3 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
WREC02 (DETERM 1 NED. MERGE-ENABLED) . 
WDATA21 (DETERMINED. MERGE-ENABLED), 
WDATA22 (DETERM 1 NED. DELET 1 ON-ENABLED) 


58 


S23(0) 


WDATA21 


WREC02 


WDATA21 


IREC01 (DETERMINED, MERGE-ENABLED). 
IDATA11 (DETERMINED, DELETION-ENABLED). 
1 DATA1 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
1 DATA1 3 (DETERM 1 NED. DELET 1 ON-ENABLED) , 
1 DATA1 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WDATAI 2 (DETERM 1 NED. MERGE-ENABLED) . 
WDATAI 3 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WREC02 (DETERM 1 NED. MERGE-ENABLED) . 
WDATA21 (DETERMINED. DELETION-ENABLED). 
WDATA22 (DETERM 1 NED. DELET 1 ON-ENABLED) 


59 


S24(0) 


WDATA21 


WREC02 




IREC01 (DETERMINED. MERGE-ENABLED). 
IDATA11 (DETERMINED, DELETION-ENABLED), 
1 DATA1 2 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
1 DATA1 3 (DETERM 1 NED, DELET 1 ON-ENABLED) , 
1 DATA1 4 (DETERM 1 NED. DELET 1 ON-ENABLED) . 
WDATA1 2 (DETERM 1 NED. MERGE-ENABLED) . 
WDATAI 3 (DETERM 1 NED, DELET 1 ON-ENABLED) . 
WREC02 (DETERM 1 NED. MERGE-ENABLED) . 
WDATA21 (DETERMINED, DELETION-ENABLED), 
WDATA22 (DETERM 1 NED. DELET 1 ON-ENABLED) 
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000010 

000020 
000030 
000040 
000050 
000060 
000070 
000080 
000090 
000100 
000110 
000120 
000130 



IDENTIFICATION 
PROGRAM- ID. 



DIVISION. 
PRG1. 



ENVIRONMENT 
INPUT-OUTPUT 
FILE-CONTROL. 

SELECT IFILEOl 



DIVISION. 
SECTION. 



ASSIGN SYS IN 



DATA 
FILE 

FD IFILEOl 
01 FILLER 
000140* MERGE! 
000150* MERGE T 
000160* MERGE! 
000170* MERGE ! 
000180 WORKING-STORAGE 
000190 01 WREC01. 
000200 03 WDATA11 
000210 03 FILLER 
000220* MERGE ! 
000230 03 WDATA14 
000240 01 FILLER 
000250* MERGE ! 
000260* MERGE ! 
000270 77 WDATA71 
000280 77 WDATA72 
000290 
000300 
000310 
000320 
000330 
000340 
000350 



DIVISION. 
SECTION. 

PIC X (80). *>UNUSED. VARIABLE AFTER MERGE 



SECTION. 



PIC 
PIC 

PIC 
PIC 



9 (02) . 
9(04). 

9(02). 
X(80). 



*>UNUSED. VARIABLE AFTER MERGE 



*>UNUSED, VARIABLE AFTER MERGE 



PIC 
PIC 



9 (02) . 
9 (02) . 



*>UNUSED 



PROCEDURE 
MOVE 1 
MOVE 2 
COMPUTE 
DISPLAY 
STOP RUN. 



DIVISION. 
WDATA11 OF WREC01. 
WDATA14 OF WREC01. 
WDATA72 = WDATA11 OF WREC01 
WDATA72. 



TO 
TO 



+ WDATA14 OF WRECOl. 
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000010 IDENTIFICATION DIVISION. 
000020 PROGRAM- ID. PR61. 
000030 

000040 ENVIRONMENT DIVISION. 

000050 INPUT-OUTPUT SECTION. 

000060 FILE-CONTROL. 

000070 SELECT IFILEOl ASSIGN SYS IN 

000080 . 

000090 

000100 DATA DIVISION. 
000110 FILE SECTION. 
000120 FD IFILEOl. 

000130 01 FILLER PIC X (80). *>UNUSED. VARIABLE AFTER MERGE 
000140* MERGE T 
000150* MERGE T 
000160* MERGE T 
000170* MERGE! 

000180 WORKING-STORAGE SECTION.' 

000190 01 WREC01. 

000200 03 WDATA11 PIC 9(02). 

000210 03 FILLER PIC 9(04). *>UNUSED. VARIABLE AFTER MERGE 
000220* MERGE T 

000230 03 WDATA14 PIC 9(02). 

000240* DELETION 

000250* MERGE T 

000260* MERGE T 

000270* DELETION 

000280 77 WDATA72 PIC 9(02). 

000290 

000300 PROCEDURE DIVISION. 

000310 MOVE 1 TO WDATA11 OF WREC01. 

000320 MOVE 2 TO WDATA14 OF WRECOl. 

000330 COMPUTE WDATA72 = WDATA11 OF WRECOl + WDATA14 OF WRECOl. 
000340 DISPLAY WDATA72. 
000350 STOP RUN. 
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# include <stdio.h> 



{ 



struct 

char 

char 

char 

char 
1 irecOl; 



idatal1[20]; 
idatal2[20]; 
idata13[20]: 
idata14[20] 



void maln(void) { 
struct { 

short wdatall ; 

short wdatal2; 

short wdatalS; 

short wdatalA; 
1 wrecOl ; 



/♦UNUSED*/ 
/♦UNUSED*/ 



struct { 

char wdata2U40]; 

char wdata22[40]; 
1 wrec02; 

short wdataVI : 
short wdata72; 



/♦UNUSED*/ 
/♦UNUSED*/ 
/*UNUSED*/ 
/*UNUSED*/ 
/♦UNUSED*/ 



1 



wrecOl. wdatall = 1 : 
wrecOl. wdata14 = 2; 
wdata72 = wrecOl. wdatall 
printf ("%d¥n". wdata72) : 



CONITNUOUSE 
AREA 



/*UNUSED*/ 
/*UNUSED*/ 
/*UNUSED*/ 

/♦UNUSED*/ 



A CONITNUOUSE 
vl^ AREA 



CONITNUOUSE 
AREA 



wrecOl. wdatal 4: 
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#include<stdio. h> 

char irecOUaO]: AUNUSED. VARIABLE AFTER MERGE*/ 

void ma i n (vo i d) { 
struct { 
short wdatal 1 ; 

char wdatal 2 [4]; /*UNUSED. VARIABLE AFTER MERGE*/ 
short wdatal 4; 
IwrecOl ; 

char wrecO2C80]: AUNUSED. VARIABLE AFTER MERGE*/ 

short wdata71 ; /*UNUSED*/ 
short wclata72; 

wrecOI. wdatal 1 = 1 : 
wrecOI. wdatal 4 = 2: 

wdata72=wrec01.wdata11 + wrecOI. wdatal 4: 

pr i ntf r%d¥n''. wdata72) : 

) 
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BUS 





5ft 






CPU 










22 r 

r 


EXTERNAL STORAGE 
DEVICE 






MEMORY 




26 




29 






MEDIUM DRIVE 
DEVICE 


— 


PORTABLE STORAGE 
MEDIUM 


^ 

INPUT DEVICE 




27 






24 r 


NETWORK 
' CONNECTION DEVICE 


— 


NETWORK 


OUTPUT DEVICE 



















nOMPUTER 20 
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